% V20210224 - 7.7.5 color [2]
INCLUDE "GW.bas"
GW_USE_THEME_CUSTO_ONCE("color=b")
mypage = GW_NEW_PAGE()
GW_ADD_TITLEBAR(mypage, "Page 1")
GW_ADD_TEXT(mypage, "This page is customized with color=b")
DIM pg[6]
FOR i=ASCII("a") TO ASCII("f")
GW_USE_THEME_CUSTO_ONCE("color="+CHR$(i))
pg[++n] = GW_ADD_PROGRESSBAR(mypage, "color="+CHR$(i)+" progressbar")
NEXT
GW_ADD_BUTTON(mypage, "EXIT", "BACK")
GW_RENDER(mypage)
FOR i=1 TO 6
GW_SET_PROGRESSBAR(pg[i], 80+20*RND())
NEXT
% Wait for user action.
GW_WAIT_ACTION$()
END "End of 'color' example."